home *** CD-ROM | disk | FTP | other *** search
/ Gigarom 1 / Gigarom Macintosh Archives (Quantum Leap)(CDRM1080320)(1993).iso / FILES / HYP / C-D / DeveloperStax.cpt / Developer Stack 1.2r / card_28709.txt < prev    next >
Text File  |  1989-02-26  |  2KB  |  68 lines
  1. -- card: 28709 from stack: in.2r
  2. -- bmap block id: 0
  3. -- flags: 0000
  4. -- background id: 3837
  5. -- name: ScreenSize
  6.  
  7.  
  8. -- part 2 (button)
  9. -- low flags: 00
  10. -- high flags: A004
  11. -- rect: left=372 top=266 right=290 bottom=466
  12. -- title width / last selected line: 0
  13. -- icon id / first selected line: 0 / 0
  14. -- text alignment: 1
  15. -- font id: 0
  16. -- text size: 12
  17. -- style flags: 0
  18. -- line height: 16
  19. -- part name: try me
  20. ----- HyperTalk script -----
  21. on mouseUp
  22.   if the optionkey is down then edit script of me
  23.   put "This screen is "&ScreenSize("¬©1988SDrazga")
  24. end mouseUp
  25.  
  26.  
  27.  
  28. -- part contents for background part 5
  29. ----- text -----
  30. ScreenSize
  31.  
  32. -- part contents for background part 6
  33. ----- text -----
  34. This XFCN can be used to determine whether your stack is running on a regular size Macintosh screen or a larger Mac II or other monitor.  This is useful in controlling the visible state of the menu bar.  Most large screen users do not like their menu bar hidden, so before hiding a menu bar you can use the XFCN to determine if it is necessary.
  35.  
  36. See also MenuBar*
  37.  
  38. This XFCN is ¬©1988 by Steve Drazga and all rights are reserved.  It may be used in any non-commercial, shareware, or commercial stacks as long as the following conditions are met:
  39.  
  40. 1) Within the credits of the stack the phrase 
  41. "Portions ¬©1988 Steve Drazga" should be included.
  42.  
  43. 2) Send a copy of your finished stack to me at:
  44. Steve Drazga
  45. AnalytX
  46. Box 388
  47. Southampton, PA  18966
  48.  
  49. The only compensation I receive will be seeing my efforts utilitized by others.
  50.  
  51. If you need custom XCMDs/XFCNs, stacks, or HyperCard training for your organization contact Steve Drazga at AnalytX (215) 464-3733.
  52.  
  53. -- part contents for background part 7
  54. ----- text -----
  55. Syntax:
  56.  
  57. ScreenSize("©1988SDrazga")
  58.  
  59. The XFCN will return either "small" if it is a regular size screen, or 
  60. "large" if it is a larger screen.
  61.  
  62. The only parameter that must be passed must is the copyright notice (the ¬© symbol is option-g).
  63.  
  64.  
  65.  
  66. -- part contents for background part 10
  67. ----- text -----
  68. 22